#include-once

Func Decrypt_hexa($data)
	$return = "Taille : " & BinaryLen($data) & @CRLF & @CRLF

	$formated = ""
	For $y = 0 To BinaryLen($data)/8
		If $y = 0 Then
			$octect_split = BinaryMid($data,1,8)
		Else
			$octect_split = BinaryMid($data,$y*8,8)
		EndIf
		For $i = 1 To 8
			$formated &= StringTrimLeft(BinaryMid($octect_split,$i,1),2) & " "
		Next
		$formated &= @CRLF
	Next

	$return &= "Hexa : " & @CRLF & $formated

	Return $return
EndFunc